-- card: 2130 from stack: in
-- bmap block id: 4314
-- flags: 0000
-- background id: 2722
-- name: 
----- HyperTalk script -----
On OpenCard
  global handle
  ButtonRgn "handle","NewRgn"
end OpenCard

On MouseUp
  global handle
  ButtonRgn "handle","TestHit",mouseH(),mouseV(),TRUE
  if the result is zero then
    put "You did not hit a button"
  else
    put "You hit button"&&the result
  end if
end MouseUp

On CloseCard
  global handle
  ButtonRgn "handle","DisposeRgn"
end CloseCard



-- part contents for background part 14
----- text -----
A Demonstration

-- part contents for background part 15
----- text -----
13

-- part contents for background part 13
----- text -----
Here are some buttons displayed in an attractive manner, numbers from 1 to 4. By clicking in any of them, you will get HyperCard to beep that number of times.